FINI
/CLE
/FILNAME,E421
/TITLE,WIND ANALYSIS OF SPHERICAL TANK
TANK						!TANKļģ
 ********** ؼ**************
!********֧ʩӹ̶Լ*********
ASEL,S,LOC,Y,-LOWZ_H		!ѡȡYΪ-LOWZ_H
DA,ALL,ALL					!Լɶ
! *********ʩӷغ*********
*SET,OMEGA,3				!OMEGA=3
!ҪGUI庯߽PRESS_S,أΪPRESSGUI̲
CSYS,2						!2ϵ
ASEL,S,LOC,X,S_R			!ѡ뾶ΪS_Rϵ
SFA,ALL,,PRES,%PRESS%		!ʩغ
CSYS						!ֱϵ
ALLSEL						!ѡԪ
! *********ṹµӦ*********
/SOLU		
ANTYPE,4					!ָΪ˲̬ѧ
TRNOPT,FULL				!˲̬ѧFULL
TIMINT,OFF					!رʱЧӦ
OUTRES,BASIC,ALL			!ÿһ
KBC,1						!ָغΪԾغ
TIME,1E-10					!ָغɲʱ
NSUB,2,4					!ָغӲΪ2ӲΪ4
SSTIF,ON					!ӦջЧӦ
ACEL,0,9.8,0					!ʩٶ
ALLSEL						!ѡԪ
SOLVE						!һغɲ
! *********£ṹ缤µӦ*********
TIMINT,ON					!ʱЧӦ
OUTRES,BASIC,ALL			!ÿһ
KBC,0						!ָغΪغ
AUTOTS,ON					!Զʱ䲽
ALPHAD,0.05 				!趨ALPHAΪ0.05
BETAD,0.01					!趨նBETAΪ0.01
TIME,5*2*3.14/OMEGA		!ָغɲʱ
NSUB,5*4,5*8				    !ָغӲΪ20ӲΪ40
ALLSEL						!ѡԪ
SOLVE						!һغɲ
SAVE						!
!*************************************************
FINI
/POST1
SET,LAST			        !ӽļһӲ
PLNSOL, U,SUM, 0,1.0      	!ʾλͼͼ4-86ʾ
PLNSOL, U,Y, 0,1.0	     	!ʾYλͼͼ4-87ʾ
PLNSOL, S,EQV, 0,1.0   !ʾṹEQUIVALENT STRESSͼ4-88ʾ
!******ʾʱȥӦеӰ嵥Ԫ******
ESEL,S,MAT,,2         !ѡϺΪ2ĵԪ
ESEL,R,REAL,,1        !ӵǰѡѡʵΪ1ĵԪ
ESEL,INVE            !ѡǰԪ			
PLNSOL, S,EQV, 0,1.0   !ʾEQUIVALENT STRESSͼ4-90ʾ
!******ǲֺ******
ESEL,S,MAT,,1            	!ѡǵԪ
PLNSOL, S,EQV, 0,1.0       	!ʾEQUIVALENT STRESSͼ4-92ʾ
ETABLE,Q_MX, SMISC, 4    	!XصԪ
ETABLE,Q_MY, SMISC, 5    	!Y
ETABLE,Q_TX, SMISC, 1    	!X
ETABLE,Q_TY, SMISC, 2    	!Y

PLETAB,Q_MX,NOAV        	!ʾXͼ
PLETAB,Q_MY,NOAV        	!ʾYͼ
PLETAB,Q_TX              	!ʾXͼ
PLETAB,Q_TY              	!ʾYͼͼ4-93ʾ
!******а岿ֺ(Ӱ)*******
ESEL,S,ENAME,,93			!ѡԪΪSHELL93ĵԪ
ESEL,U,MAT,,1				!ӵǰѡȥϺΪ1ĵԪ
ESEL,U,REAL,,2				!ӵǰѡȥʵΪ2ĵԪ
ESEL,U,REAL,,1				!ӵǰѡȥʵΪ1ĵԪ

PLNSOL, U,SUM, 0,1.0       	!λͼ
PLNSOL, S,EQV, 0,1.0      	!ʾEQUIVALENT STRESSͼ4-35ʾ
ETABLE,P_MX, SMISC, 4    	!аX
ETABLE,P_MY, SMISC, 5    	!аY
ETABLE,P_TX, SMISC, 1    	!аX
ETABLE,P_TY, SMISC, 2    	!аY

PLETAB,P_MX,NOAV        	!ʾаXͼͼ4-94ʾ
PLETAB,P_MY,NOAV         	!ʾаYͼ
PLETAB,P_TX              	!ʾаXͼͼ4-95ʾ
PLETAB,P_TY              	!ʾаYͼ
!*******ֺ֧********
ESEL,S,ENAME,,16					!ѡԪΪPIPE16ĵԪ
PLNSOL, U,SUM, 0,1.0     			    !λͼ
ETABLE,Z_FORX, SMISC, 7  			!֧X
ETABLE,Z_FORY, SMISC, 8  			!֧Y
ETABLE,Z_FORZ, SMISC, 9  			!֧Z
ETABLE,Z_MOMX, SMISC, 10 			!֧X
ETABLE,Z_MOMY, SMISC, 11 			!֧Y
ETABLE,Z_MOMZ, SMISC, 12 			!֧Z
PLLS,Z_FORX,Z_FORX,0.2,0         	!ʾ֧Xͼ4-96ʾ
PLLS,Z_FORY,Z_FORY,1,0          	!ʾ֧Y
PLLS,Z_FORZ,Z_FORZ,1,0          	!ʾ֧Z
PLLS,Z_MOMX,Z_MOMX,1,0           !ʾ֧X
PLLS,Z_MOMY,Z_MOMY,1,0          	!ʾ֧Y
PLLS,Z_MOMZ,Z_MOMZ,1,0          	!ʾ֧Zأͼ4-97ʾ
!*******˲ֺ*******
ESEL,S,ENAME,,8			!ѡԪΪLINK8ĵԪ
PLNSOL, U,SUM, 0,1.0     	!λͼͼ4-98ʾ
ETABLE,SAXL, LS, 1      	!
PLLS,SAXL,SAXL,0.2,0    	!ʾͼ4-99ʾ
ALLSEL
FINI
/POST26
NSOL,2,1622,U,X, UX_UP  	!ȡ޶ڵXλ
NSOL,3,1622,U,Y, UY_UP  	!ȡ޶ڵYλ
NSOL,5,1557,U,X, UX_LOW	!ȡڵXλ
NSOL,6,1577,U,Y, UY_LOW	!ȡڵYλ
DERIV,8,2,1,,VX_UP		!ԶڵXλ΢㣬õXٶ
DERIV,9,3,1,,VY_UP		!ԶڵYλ΢㣬õYٶ
DERIV,11,5,1,,VX_LOW	!ڵXλ΢㣬õXٶ
DERIV,12,6,1,,VY_LOW	!ڵYλ΢㣬õYٶ
PLVAR,2,5		!ʾڵXλʱ仯ߣͼ4-100ʾ
PLVAR,3,6		!ʾڵYλʱ仯ߣͼ4-101ʾ
PLVAR,8,11		!ʾڵXٶʱ仯ߣͼ4-102ʾ
PLVAR,9,12		!ʾڵYٶʱ仯ߣͼ4-103ʾ
